home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 49 / Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso / -serious- / graphics / sviewiv / superviewlibrary / install_svlib < prev    next >
Text File  |  1999-11-30  |  26KB  |  706 lines
  1. ; $VER: Install_SVLib V24.1 (20.9.99)
  2. ; © 1993-99 by Andreas R. Kleinert.
  3. ; This is the Installer Script for superview.library V24+
  4. ;
  5. ; Italian strings by Alessandro Basso <cralex@amiga.dei.unipd.it>
  6. ; Norwegian strings by Roger Hågensen <msi@sn.no>
  7. ; French strings by Julien Wilk <wilkj@esiee.fr>
  8. ; Spanish strings by Dámaso D. Estévez <amidde@arrakis.es>
  9. ;
  10.  
  11.  
  12. ; *** english is default language
  13.  
  14.     (set @app-name "SuperView-Library")
  15.     (set #welc "SuperView-Library Installation")
  16.     (set #mcp (cat "If you are running MCP and don't disable the\n"
  17.                    "following patches, you may encounter big problems:\n\n"
  18.                    "- new tooltypes\n"
  19.                    "- reqtols patch\n"
  20.                    "- onereq\n"
  21.                    "- library search\n"
  22.                    "- SetRGB32\n"
  23.                    "\nYou may wish to ask the authors of MCP to fix this\n"
  24.                    "- if not already done. So, be warned !"))
  25.  
  26.     (set #Msg_Yes "Yes")
  27.     (set #Msg_No  "No")
  28.     (set #Msg_BasicConfig "What's your basic configuration ?")
  29.     (set #Gfx0  "Not specified (do not change)")
  30.     (set #Gfx1  "Amiga OCS/ECS, no GfxCard")
  31.     (set #Gfx2  "Amiga AGA, no GfxCard")
  32.     (set #Gfx3  "CD-32 AGA, no GfxCard")
  33.     (set #Gfx4  "Card with CyberGraphX emulation")
  34.     (set #Gfx5  "Card with Picasso96 emulation")
  35.     (set #Gfx6  "Card with EGS emulation")
  36.     (set #Gfx7  "Picasso II(+) - vilintuisup")
  37.     (set #Gfx8  "Retina Z2/BLT Z3")
  38.     (set #Gfx9  "Merlin II")
  39.     (set #Gfx10 "OpalVision")
  40.     (set #Gfx11 "Amiga OCS/ECS/AGA, other GfxCard")
  41.     (set #Msg_CopyEnvConfig "Copying appropriate configuration to ENV:")
  42.     (set #Msg_LibPath "Library Path")
  43.     (set #Msg_InstallingLibs "Copying Libraries...")
  44.     (set #Msg_Ghostscript (cat "\nDo you already have Ghostscript installed ?\n\n"
  45.                                "(When answering with <Yes>, you have to supply\n"
  46.                                " the program's path and name here.)\n"
  47.                          )
  48.     )
  49.     (set #Msg_GSPath "Path and name of Ghostscript executable")
  50.     (set #Msg_MetaView    (cat "\nDo you already have MetaView installed ?\n\n"
  51.                                "(When answering with <Yes>, you have to supply\n"
  52.                                " the program's path and name here.)\n"
  53.                          )
  54.     )
  55.     (set #Msg_MVPath "Path and name of MetaView executable")
  56.     (set #Msg_CatPath "Catalog Path")
  57.     (set #Msg_InstallingCats "Copying catalog files...")
  58.     (set #Msg_VMEM "Now modifying your S:User-Startup for VMem-Support...")
  59.     (set #Msg_VMemPath "Virtual Memory Path")
  60.     (set #Msg_CopyPrefs "Copy SVPrefs to SYS:Prefs ?")
  61.     (set #Msg_PackerSupport "Install PackerSupport right now ?")
  62.     (set #Msg_SQOperators "Install SQ-Operators right now ?")
  63.     (set #Msg_Ready "SuperView-Library has been installed now.\nIf this was an Update, you should\nreboot your computer now.")
  64.  
  65.  
  66. (if (= @language "deutsch")
  67.   (
  68.     (set @app-name "SuperView-Library")
  69.     (set #welc "SuperView-Library Installation")
  70.     (set #mcp (cat "Falls bei Ihnen MCP installiert ist und sie nicht\n"
  71.                    "folgende Patches deaktivieren, könnten größere\n"
  72.                    "Probleme autreten:\n\n"
  73.                    "- new tooltypes\n"
  74.                    "- reqtols patch\n"
  75.                    "- onereq\n"
  76.                    "- library search\n"
  77.                    "- SetRGB32\n"
  78.                    "\nBitten Sie doch die MCP-Autoren, das ggf. zu\n"
  79.                    "beheben, falls nicht bereits geschehen...\n"))
  80.  
  81.     (set #Msg_Yes "Ja")
  82.     (set #Msg_No  "Nein")
  83.     (set #Msg_BasicConfig "Was ist Ihre Grundkonfiguration ?")
  84.     (set #Gfx0  "Keine Angabe (nichts ändern)")
  85.     (set #Gfx1  "Amiga OCS/ECS, keine Grafikkarte")
  86.     (set #Gfx2  "Amiga AGA, keine Grafikkarte")
  87.     (set #Gfx3  "CD-32 AGA, keine Grafikkarte")
  88.     (set #Gfx4  "Karte mit CyberGraphX-Emulation")
  89.     (set #Gfx5  "Karte mit Picasso96-Emulation")
  90.     (set #Gfx6  "Karte mit EGS-Emulation")
  91.     (set #Gfx7  "Picasso II(+) - vilintuisup")
  92.     (set #Gfx8  "Retina Z2/BLT Z3")
  93.     (set #Gfx9  "Merlin II")
  94.     (set #Gfx10 "OpalVision")
  95.     (set #Gfx11 "Amiga OCS/ECS/AGA, andere Grafikkarte")
  96.     (set #Msg_CopyEnvConfig "Kopiere notwendige Konfiguration nach ENV:")
  97.     (set #Msg_LibPath "Library-Pfad")
  98.     (set #Msg_InstallingLibs "Kopiere Libraries...")
  99.     (set #Msg_Ghostscript (cat "\nHaben Sie bereits Ghostscript installiert ?\n\n"
  100.                                "(Falls <Ja>, müssen Sie hier nun den\n"
  101.                                " Programmpfad und -namen angeben.)\n"
  102.                          )
  103.     )
  104.     (set #Msg_GSPath "Pfad und Name des Ghostscript-Programmes")
  105.     (set #Msg_MetaView    (cat "\nHaben Sie bereits MetaView installiert ?\n\n"
  106.                                "(Falls <Ja>, müssen Sie hier nun den\n"
  107.                                " Programmpfad und -namen angeben.)\n"
  108.                          )
  109.     )
  110.     (set #Msg_MVPath "Pfad und Name des MetaView-Programmes")
  111.     (set #Msg_CatPath "Katalogpfad")
  112.     (set #Msg_InstallingCats "Kopiere Katalogdateien...")
  113.     (set #Msg_VMEM "Ändere jetzt S:User-Startup für VMem-Unterstützung...")
  114.     (set #Msg_VMemPath "Pfad für virtuellen Speicher")
  115.     (set #Msg_CopyPrefs "SVPrefs nach SYS:Prefs kopieren ?")
  116.     (set #Msg_PackerSupport "Packer-Unterstützung jetzt gleich installieren ?")
  117.     (set #Msg_SQOperators "SQ-Operators jetzt gleich installieren ?")
  118.     (set #Msg_Ready "SuperView-Library wurde installiert.\nFalls dies ein Update war, sollten Sie ggf.\nIhren Rechner nun neu starten.")
  119.   )
  120. )
  121.  
  122. (if (= @language "italiano")
  123.   (
  124.     (set #Msg_Yes "Si")
  125.     (set #Msg_No  "No")
  126.     (set #Msg_BasicConfig "Qual è la tua configurazione base ?")
  127.     (set #Gfx0  "Non specificata (da non cambiare)")
  128.     (set #Gfx1  "Amiga OCS/ECS, senza SchedaGfx")
  129.     (set #Gfx2  "Amiga AGA, senza SchedaGfx")
  130.     (set #Gfx3  "CD-32 AGA, senza SchedaGfx")
  131.     (set #Gfx4  "Scheda con Emulazione-CyberGraphX")
  132.     (set #Gfx5  "Scheda con Emulazione-Picasso96")
  133.     (set #Gfx6  "Scheda con Emulazione-EGS")
  134.     (set #Gfx7  "Picasso II(+) - vilintuisup")
  135.     (set #Gfx8  "Retina Z2/BLT Z3")
  136.     (set #Gfx9  "Merlin II")
  137.     (set #Gfx10 "OpalVision")
  138.     (set #Gfx11 "Amiga OCS/ECS/AGA, altra SchedaGfx")
  139.     (set #Msg_CopyEnvConfig "Sto copiando configurazione appropriata in ENV:")
  140.     (set #Msg_LibPath "Percorso Libreria")
  141.     (set #Msg_InstallingLibs "Sto copiando Librerie...")
  142.     (set #Msg_Ghostscript (cat "\nHai già installato il Ghostscript ?\n\n"
  143.                                "(Se rispondi con <Si>, dovrai fornire\n"
  144.                                "nome e percorso del programma qui.)\n"
  145.                          )
  146.     )
  147.     (set #Msg_GSPath "Percorso e nome dell'eseguibile Ghostscript")
  148.     (set #Msg_MetaView    (cat "\nHai già installato il MetaView ?\n\n"
  149.                                "(Se rispondi con <Si>, dovrai fornire\n"
  150.                                "nome e percorso del programma qui.)\n"
  151.                          )
  152.     )
  153.     (set #Msg_MVPath "Percorso e nome dell'eseguibile MetaView")
  154.     (set #Msg_CatPath "Percorso Catalogo")
  155.     (set #Msg_InstallingCats "Sto copiando files del catalogo...")
  156.     (set #Msg_VMEM "Ora modifico la tua S:User-Startup per supporto-VMem...")
  157.     (set #Msg_VMemPath "Percorso Memoria Virtuale")
  158.     (set #Msg_CopyPrefs "Copio SVPrefs in SYS:Prefs ?")
  159.     (set #Msg_PackerSupport "Installo Supporto-Packer adesso ?")
  160.     (set #Msg_SQOperators "Installo Operatori-SQ adesso ?")
  161.     (set #Msg_Ready "Libreria-SuperView è stata ora installata.\nSe questo fosse un Aggiornamento, dovresti\neseguire un reboot del tuo computer ora.")
  162.   )
  163. )
  164.  
  165. (if (= @language "norsk")
  166.   (
  167.     (set #Msg_Yes "Ja")
  168.     (set #Msg_No  "Nei")
  169.     (set #Msg_BasicConfig "Hva er din standard konfigurasjon ?")
  170.     (set #Gfx0  "Ikke spesifisert (ikke forandre)")
  171.     (set #Gfx1  "Amiga OCS/ECS, ingen GfxKort")
  172.     (set #Gfx2  "Amiga AGA, ingen GfxKort")
  173.     (set #Gfx3  "CD-32 AGA, ingen GfxKort")
  174.     (set #Gfx4  "Kort med CyberGraphX emulasjon")
  175.     (set #Gfx5  "Kort med Picasso96 emulasjon")
  176.     (set #Gfx6  "Kort med EGS emulasjon")
  177.     (set #Gfx7  "Picasso II(+) - vilintuisup")
  178.     (set #Gfx8  "Retina Z2/BLT Z3")
  179.     (set #Gfx9  "Merlin II")
  180.     (set #Gfx10 "OpalVision")
  181.     (set #Gfx11 "Amiga OCS/ECS/AGA, annet GfxKort")
  182.     (set #Msg_CopyEnvConfig "Kopierer passende konfigurasjon til ENV:")
  183.     (set #Msg_LibPath "Bibliotek Sti (Library)")
  184.     (set #Msg_InstallingLibs "Kopierer Bibliotek...")
  185.     (set #Msg_Ghostscript (cat "\nHar du allerede Ghostscript installert ?\n\n"
  186.                                "(Når du svarer med <Ja>, må du gi stien til\n"
  187.                                " programmet og programmets navn her.)\n"
  188.                          )
  189.     )
  190.     (set #Msg_GSPath "Sti og navn til Ghostscript program")
  191.     (set #Msg_MetaView    (cat "\nHar du allerede MetaView installert ?\n\n"
  192.                                "(Når du svarer med <Ja>, må du gi stien til\n"
  193.                                " programmet og programmets navn her.)\n"
  194.                          )
  195.     )
  196.     (set #Msg_MVPath "Stio og nanv til MetaView program")
  197.     (set #Msg_CatPath "Katalog Sti")
  198.     (set #Msg_InstallingCats "Kopierer katalog filer...")
  199.     (set #Msg_VMEM "Modifiserer nå S:User-Startup for VMem-Støtte...")
  200.     (set #Msg_VMemPath "Virtuellt Minne Sti")
  201.     (set #Msg_CopyPrefs "Kopier SVPrefs til SYS:Prefs ?")
  202.     (set #Msg_PackerSupport "Installer PackerStøtte nå?")
  203.     (set #Msg_SQOperators "Installer SQ-Operatører (Operators) nå ?")
  204.     (set #Msg_Ready "SuperView-Library er nå installert.\nHvis dette var en Oppdatering, bør du\nstarte maskinen på nytt.")
  205.   )
  206. )
  207.  
  208. (if (= @language "français")
  209.   (
  210.     (set #Msg_Yes "Oui")
  211.     (set #Msg_No  "Non")
  212.     (set #Msg_BasicConfig "Quelle est votre configuration de base ?")
  213.     (set #Gfx0  "Non listée (ne rien changer)")
  214.     (set #Gfx1  "Amiga OCS/ECS, pas de carte graphique")
  215.     (set #Gfx2  "Amiga AGA, pas de carte graphique")
  216.     (set #Gfx3  "CD-32 AGA, pas de carte graphique")
  217.     (set #Gfx4  "Carte avec émulation CyberGraphX")
  218.     (set #Gfx5  "Carte avec émulation Picasso96")
  219.     (set #Gfx6  "Carte avec émulation EGS")
  220.     (set #Gfx7  "Picasso II(+) - vilintuisup")
  221.     (set #Gfx8  "Retina Z2/BLT Z3")
  222.     (set #Gfx9  "Merlin II")
  223.     (set #Gfx10 "OpalVision")
  224.     (set #Gfx11 "Amiga OCS/ECS/AGA, autre carte graphique")
  225.     (set #Msg_CopyEnvConfig "Copie de la configuration appropriée dans ENV:")
  226.     (set #Msg_LibPath "Chemin des librairies")
  227.     (set #Msg_InstallingLibs "Copie des librairies...")
  228.     (set #Msg_Ghostscript (cat "\nAvez-vous déjà installé Ghostscript ?\n\n"
  229.                                "(Si vous répondez par <Oui>, il vous faudra fournir\n"
  230.                                " le chemin du programme et son nom.)\n"
  231.                          )
  232.     )
  233.     (set #Msg_GSPath "Chemin et nom de l'exécutable Ghostscript")
  234.     (set #Msg_MetaView    (cat "\nAvez-vous déjà installé MetaView ?\n\n"
  235.                                "(Si vous répondez par <Oui>, il vous faudra fournir\n"
  236.                                " le chemin du programme et son nom.)\n"
  237.                          )
  238.     )
  239.     (set #Msg_MVPath "Chemin et nom de l'exécutable MetaView")
  240.     (set #Msg_CatPath "Chemin des catalogues")
  241.     (set #Msg_InstallingCats "Copie des fichiers catalogues...")
  242.     (set #Msg_VMEM "Modification de votre S:User-Startup au niveau de VMem-Support...")
  243.     (set #Msg_VMemPath "Chemin de la mémoire virtuelle")
  244.     (set #Msg_CopyPrefs "Copier SVPrefs dans SYS:Prefs ?")
  245.     (set #Msg_PackerSupport "Installer le PackerSupport maintenant ?")
  246.     (set #Msg_SQOperators "Installer les SQ-Operators maintenant ?")
  247.     (set #Msg_Ready "SuperView-Library a été installé avec succès.\nS'il s'agissait d'une mise à jour, vous devriez\nredémarrer votre ordinateur maintenant.")
  248.   )
  249. )
  250.  
  251. (if (= @language "español")
  252.   (
  253.     (set @app-name "Biblioteca SuperView")
  254.     (set #welc "Instalación de la biblioteca SuperView")
  255.  
  256.     (set #mcp (cat "Si está ejecutando la comodidad MCP y no desconecta\n"
  257.                    "los siguientes parches, podría encontrarse con\n"
  258.                    "graves problemas:\n\n"
  259.                    "- nuevos tipos de herramienta ('new tooltypes')\n"
  260.                    "- parche reqtols ('reqtools patch')\n"
  261.                    "- petición única ('onereq')\n"
  262.                    "- búsqueda de bibliotecas ('library search')\n"
  263.                    "- SetRGB32\n"
  264.                    "\nLe aconsejo que, si los autores de MCP no los han\n"
  265.                    "corregido aún, ¡tenga mucho cuidado! y les informe."))
  266.  
  267.     (set #Msg_Yes "Sí")
  268.     (set #Msg_No  "No")
  269.     (set #Msg_BasicConfig "¿Cual es su configuración básica?")
  270.     (set #Gfx0  "No especificada (no modificar)")
  271.     (set #Gfx1  "Amiga OCS/ECS, sin tarjeta gráfica")
  272.     (set #Gfx2  "Amiga AGA, sin tarjeta gráfica")
  273.     (set #Gfx3  "CD-32 AGA, sin tarjeta gráfica")
  274.     (set #Gfx4  "Tarjeta con emulación CyberGraphX")
  275.     (set #Gfx5  "Tarjeta con emulación Picasso96")
  276.     (set #Gfx6  "Tarjeta con emulación EGS")
  277.     (set #Gfx7  "Picasso II(+) - vilintuisup")
  278.     (set #Gfx8  "Retina Z2/BLT Z3")
  279.     (set #Gfx9  "Merlin II")
  280.     (set #Gfx10 "OpalVision")
  281.     (set #Gfx11 "Amiga OCS/ECS/AGA, con otra tarjeta gráfica")
  282.     (set #Msg_CopyEnvConfig "Copiando configuración apropiada en ENV:")
  283.     (set #Msg_LibPath "Elija el camino de acceso a las bibliotecas")
  284.     (set #Msg_InstallingLibs "Copiando bibliotecas...")
  285.     (set #Msg_Ghostscript (cat "\n¿Se encuentra instalado Ghostscript en su sistema?\n\n"
  286.                                "(si responde afirmativamente deberá suministrar\n"
  287.                                "el camino de acceso y nombre del ejecutable).\n"
  288.                          )
  289.     )
  290.     (set #Msg_GSPath "Camino de acceso y nombre del ejecutable Ghostscript")
  291.     (set #Msg_MetaView    (cat "\n¿Se encuentra instalado MetaView en su sistema?\n\n"
  292.                                "(si responde afirmativamente deberá suministrar\n"
  293.                                "el camino de acceso y nombre del ejecutable).\n"
  294.                          )
  295.     )
  296.     (set #Msg_MVPath "Camino de acceso y nombre del ejecutable MetaView")
  297.     (set #Msg_CatPath "Elija el lugar donde desea instalar los catálogos")
  298.     (set #Msg_InstallingCats "Copiando catálogos...")
  299.     (set #Msg_VMEM "Modificando su fichero S:User-Startup para el soporte de memoria virtual...")
  300.     (set #Msg_VMemPath "Camino de acceso a la memoria virtual")
  301.     (set #Msg_CopyPrefs "¿Desea copiar SVPrefs a SYS:Prefs ?")
  302.     (set #Msg_PackerSupport "¿Desea instalar ahora el módulo de empaquetado/compresión?")
  303.     (set #Msg_SQOperators "¿Desea instalar ahora los operadores SQ?")
  304.     (set #Msg_Ready "La biblioteca SuperView ha sido instalada.\nSi se trata de una actualización,\ndebería reiniciar su equipo inmediatamente.")
  305.   )
  306. )
  307.  
  308. (welcome #welc)
  309. (message #mcp)
  310.  
  311. (set #cpu (database "cpu")) (if (> (exists ("sys:libs/68060.library")) 0)   (set #cpu     "68060")  )
  312. (set #ppc_cpu "none")       (if (> (exists ("sys:libs/ppc.library")) 0)     (set #ppc_cpu "PPC60x") )
  313.                             (if (> (exists ("sys:libs/PowerPC.library")) 0) (set #ppc_cpu "PPC60x") )
  314.  
  315. ; **************************************************************************
  316. ; Create/Update basic configuration
  317.  
  318. (makedir "ENV:SuperView-Library" (safe))
  319. (makedir "ENVARC:SuperView-Library" (safe))
  320.  
  321. (set #selectsvdriver (askchoice
  322.                       (prompt #Msg_BasicConfig)
  323.                       (help @askchoice-help)
  324.                       (choices #Gfx0 #Gfx1 #Gfx2 #Gfx3 #Gfx4 #Gfx5 #Gfx6 #Gfx7 #Gfx8 #Gfx9 #Gfx10 #Gfx11)
  325.                       (default 1)
  326.                     )
  327. )
  328.  
  329. (if (= #selectsvdriver 1)  (set #env_source "docs/SampleConfigs/env_ECS")           )
  330. (if (= #selectsvdriver 2)  (set #env_source "docs/SampleConfigs/env_AGA")           )
  331. (if (= #selectsvdriver 3)  (set #env_source "docs/SampleConfigs/env_AGA_CD32")      )
  332. (if (= #selectsvdriver 4)  (set #env_source "docs/SampleConfigs/env_CyberGraphics") )
  333. (if (= #selectsvdriver 5)  (set #env_source "docs/SampleConfigs/env_Picasso96")     )
  334. (if (= #selectsvdriver 6)  (set #env_source "docs/SampleConfigs/env_EGS7")          )
  335. (if (= #selectsvdriver 7)  (set #env_source "docs/SampleConfigs/env_PicassoII")     )
  336. (if (= #selectsvdriver 8)  (set #env_source "docs/SampleConfigs/env_Retina")        )
  337. (if (= #selectsvdriver 9)  (set #env_source "docs/SampleConfigs/env_Merlin")        )
  338. (if (= #selectsvdriver 10) (set #env_source "docs/SampleConfigs/env_OpalVision")    )
  339. (if (= #selectsvdriver 11) (set #env_source "docs/SampleConfigs/env_GfxCards")      )
  340.  
  341. (if (> #selectsvdriver 0)
  342.   (
  343.     (copyfiles
  344.       (prompt #Msg_CopyEnvConfig)
  345.       (help @copyfiles-help)
  346.       (source #env_source)
  347.       (dest "ENV:")
  348.       (all)
  349.     )
  350.     (copyfiles
  351.       (prompt #Msg_CopyEnvConfig)
  352.       (help @copyfiles-help)
  353.       (source #env_source)
  354.       (dest "ENVARC:")
  355.       (all)
  356.     )
  357.   )
  358. )
  359.  
  360. (copyfiles
  361.   (prompt #Msg_CopyEnvConfig)
  362.   (help @copyfiles-help)
  363.   (source "env")
  364.   (dest "ENVARC:")
  365.   (all)
  366. )
  367.  
  368. ; **************************************************************************
  369. ; Install main libraries
  370.  
  371. (if (exists "ENVARC:SuperView-Library/SVLIB_WHERE") (set #svlibdir (getenv "SuperView-Library/SVLIB_WHERE"))
  372.  
  373.  (set #svlibdir "LIBS:")
  374. )
  375.  
  376. (if (= (exists (#svlibdir)) 0) (set #svlibdir "LIBS:") )
  377.  
  378. (set #svlibdir
  379.               (askdir
  380.                       (prompt #Msg_LibPath)
  381.                       (help @askdir-help)
  382.                       (newpath)
  383.                       (default #svlibdir)
  384.                )
  385. )
  386.  
  387. (delete "ENVARC:SuperView-Library/SVLIB_WHERE")
  388. (delete "ENV:SuperView-Library/SVLIB_WHERE")
  389. (textfile (dest "ENVARC:SuperView-Library/SVLIB_WHERE") (append #svlibdir) (safe))
  390. (textfile (dest "ENV:SuperView-Library/SVLIB_WHERE") (append #svlibdir) (safe))
  391.  
  392. (copylib
  393.   (prompt #Msg_InstallingLibs)
  394.   (help @copylib-help)
  395.   (source "libs/superview.library")
  396.   (dest #svlibdir)
  397. )
  398.  
  399. (set @default-dest #svlibdir)
  400.  
  401. (copylib
  402.   (prompt #Msg_InstallingLibs)
  403.   (help @copylib-help)
  404.   (source "libs/superviewsupport.library")
  405.   (dest #svlibdir)
  406. )
  407.  
  408. ; **************************************************************************
  409. ; Ask for Ghostscript
  410.  
  411. (if (exists "libs/svobjects/Ghostscript.svobject")
  412.   (
  413.     (set #gsquest (askchoice
  414.                     (prompt #Msg_Ghostscript)
  415.                     (help @askchoice-help)
  416.                     (choices #Msg_Yes #Msg_No)
  417.                     (default 1)
  418.                   )
  419.     )
  420.  
  421.     (if (= #gsquest 0)
  422.       (
  423.         (set #gspath (askfile
  424.                       (prompt #Msg_GSPath)
  425.                       (help @askfile-help)
  426.                       (default "gs000")
  427.                     )
  428.         )
  429.         (set #gspathopt (cat "GS_PATH=" #gspath "\n"))
  430.         (textfile
  431.           (dest "ENV:SuperView-Library/Ghostscript.controlpad")
  432.           (append #gspathopt)
  433.         )
  434.         (copyfiles
  435.           (source "ENV:SuperView-Library/Ghostscript.controlpad")
  436.           (dest "ENVARC:SuperView-Library")
  437.         )
  438.       )
  439.     )
  440. ) )
  441.  
  442. ; **************************************************************************
  443. ; Ask for MetaView
  444.  
  445. (if (exists "libs/svobjects/MetaView.svobject")
  446.   (
  447.     (set #mvquest (askchoice
  448.                     (prompt #Msg_MetaView)
  449.                     (help @askchoice-help)
  450.                     (choices #Msg_Yes #Msg_No)
  451.                     (default 1)
  452.                   )
  453.     )
  454.  
  455.     (if (= #mvquest 0)
  456.       (
  457.         (set #mvpath (askfile
  458.                       (prompt #Msg_MVPath)
  459.                       (help @askfile-help)
  460.                       (default "MetaView")
  461.                     )
  462.         )
  463.         (set #mvpathopt (cat "METAVIEW_PATH=" #mvpath "\n"))
  464.         (textfile
  465.           (dest "ENV:SuperView-Library/MetaView.controlpad")
  466.           (append #mvpathopt)
  467.         )
  468.         (copyfiles
  469.           (source "ENV:SuperView-Library/MetaView.controlpad")
  470.           (dest "ENVARC:SuperView-Library")
  471.         )
  472.       )
  473.     )
  474.   )
  475. )
  476.  
  477. ; **************************************************************************
  478. ; Install catalogs
  479.  
  480. (makedir "SYS:locale")
  481. (makedir "SYS:locale/catalogs")
  482.  
  483. (copyfiles
  484.   (prompt #Msg_InstallingCats)
  485.   (help @copyfiles-help)
  486.   (source "locale/catalogs")
  487.   (set #svcatdir
  488.               (askdir
  489.                      (prompt #Msg_CatPath)
  490.                      (help @askdir-help)
  491.                      (newpath)
  492.                      (default "SYS:locale/Catalogs")
  493.               )
  494.   )
  495.   (dest #svcatdir)
  496.   (all)
  497. )
  498.  
  499. ; **************************************************************************
  500. ; Install library modules
  501.  
  502. (set #svobjectdir   (tackon #svlibdir "svobjects"))
  503. (set #svdriverdir   (tackon #svlibdir "svdrivers"))
  504. (set #svoperatordir (tackon #svlibdir "svoperators"))
  505. (set #svstoredir    (tackon #svlibdir "svstorage"))
  506.  
  507. (makedir #svobjectdir)
  508. (makedir #svdriverdir)
  509. (makedir #svoperatordir)
  510. (makedir #svstoredir)
  511.  
  512. (copyfiles
  513.   (prompt #Msg_InstallingLibs)
  514.   (help @copyfiles-help)
  515.   (source "libs/svobjects")
  516.   (dest (tackon #svlibdir "svobjects"))
  517.   (pattern "#?")
  518.   (confirm)
  519.   (files)
  520. )
  521.  
  522. (if (exists(tackon #svobjectdir "SVO.svobject"))
  523.  (rename (tackon #svobjectdir "SVO.svobject") (tackon #svstoredir "SVO.svobject") (safe))
  524. )
  525.  
  526. (if (exists(tackon #svobjectdir "CyberDataType.svobject"))
  527.  (rename (tackon #svobjectdir "CyberDataType.svobject") (tackon #svstoredir "CyberDataType.svobject") (safe))
  528. )
  529.  
  530. (copyfiles
  531.   (prompt #Msg_InstallingLibs)
  532.   (help @copyfiles-help)
  533.   (source "libs/svdrivers")
  534.   (dest (tackon #svlibdir "svdrivers"))
  535.   (pattern "#?")
  536.   (confirm)
  537.   (files)
  538. )
  539.  
  540. (if (NOT (= #selectsvdriver 5))
  541.  (rename (tackon #svdriverdir "Picasso96.svdriver") (tackon #svstoredir "Picasso96.svdriver") (safe))
  542. )
  543.  
  544. (if (NOT (= #selectsvdriver 6))
  545.  (rename (tackon #svdriverdir "EGS7.svdriver") (tackon #svstoredir "EGS7.svdriver") (safe))
  546. )
  547.  
  548. (if (NOT (= #selectsvdriver 7))
  549.  (rename (tackon #svdriverdir "PicassoII.svdriver") (tackon #svstoredir "PicassoII.svdriver") (safe))
  550. )
  551.  
  552. (if (NOT (= #selectsvdriver 8))
  553.  (rename (tackon #svdriverdir "Retina.svdriver") (tackon #svstoredir "Retina.svdriver") (safe))
  554. )
  555.  
  556. (if (NOT (= #selectsvdriver 9))
  557.  (rename (tackon #svdriverdir "MERLIN.svdriver") (tackon #svstoredir "MERLIN.svdriver") (safe))
  558. )
  559.  
  560. (if (NOT (= #selectsvdriver 10))
  561.  (rename (tackon #svdriverdir "OPAL.svdriver") (tackon #svstoredir "OPAL.svdriver") (safe))
  562. )
  563.  
  564. (copyfiles
  565.   (prompt #Msg_InstallingLibs)
  566.   (help @copyfiles-help)
  567.   (source "libs/svoperators")
  568.   (dest (tackon #svlibdir "svoperators"))
  569.   (pattern "#?")
  570.   (confirm)
  571.   (files)
  572. )
  573.  
  574. (if (exists "libs/68030")
  575.   (
  576.     (if (>= #cpu 68020)
  577.       (
  578.         (copyfiles
  579.           (prompt #Msg_InstallingLibs)
  580.           (help @copyfiles-help)
  581.           (source "libs/68030")
  582.           (dest #svlibdir)
  583.           (confirm)
  584.           (all)
  585.         )
  586.       )
  587.     )
  588.   )
  589. )
  590.  
  591. (if (exists "libs/68040")
  592.   (
  593.     (if (>= #cpu 68040)
  594.       (
  595.         (copyfiles
  596.           (prompt #Msg_InstallingLibs)
  597.           (help @copyfiles-help)
  598.           (source "libs/68040")
  599.           (dest #svlibdir)
  600.           (confirm)
  601.           (all)
  602.         )
  603.       )
  604.     )
  605.   )
  606. )
  607.  
  608. ; **************************************************************************
  609. ; Modify User-Startup
  610.  
  611. (if (exists "ENVARC:SuperView-Library/SVMEM_WHERE") (set #vmemdir (getenv "SuperView-Library/SVMEM_WHERE"))
  612.  
  613.  (set #vmemdir "T:")
  614. )
  615.  
  616. (if (= (exists (#vmemdir)) 0) (set #vmemdir "T:") )
  617.  
  618. (set #vmemdir
  619.               (askdir
  620.                 (prompt #Msg_VMemPath)
  621.                 (help @askdir-help)
  622.                 (newpath)
  623.                 (default #vmemdir)
  624.               )
  625. )
  626.  
  627. (delete "ENVARC:SuperView-Library/SVMEM_WHERE")
  628. (delete "ENV:SuperView-Library/SVMEM_WHERE")
  629. (textfile (dest "ENVARC:SuperView-Library/SVMEM_WHERE") (append #vmemdir) (safe))
  630. (textfile (dest "ENV:SuperView-Library/SVMEM_WHERE") (append #vmemdir) (safe))
  631.  
  632. (startup "SuperView-Library"
  633.   (prompt #Msg_VMEM)
  634.   (help @startup-help)
  635.   (command "Assign VMEM: "#vmemdir"\nSYS:Prefs/SVPrefs >NIL: <NIL: INIT\n")
  636. )
  637.  
  638. ; **************************************************************************
  639. ; Install SVPrefs
  640.  
  641. (copyfiles
  642.   (prompt #Msg_CopyPrefs)
  643.   (help @copyfiles-help)
  644.   (source "Prefs")
  645.   (dest "SYS:Prefs")
  646.   (all)
  647.   (confirm)
  648. )
  649.  
  650. ; **************************************************************************
  651. ; Ask for Packersupport
  652.  
  653. (if (exists "PackerSupport")
  654.   (
  655.     (set #ask_ps (askbool (prompt #Msg_PackerSupport) (help @askbool-help) ) )
  656.  
  657.     (if (= #ask_ps TRUE)
  658.       (
  659.         (copyfiles
  660.           (prompt #Msg_InstallingLibs)
  661.           (help @copyfiles-help)
  662.           (source "PackerSupport/libs/svobjects")
  663.           (dest (tackon #svlibdir "svobjects"))
  664.           (pattern "#?")
  665.           (files)
  666.         )
  667.       )
  668.     )
  669.   )
  670. )
  671.  
  672. ; **************************************************************************
  673. ; Ask for SQOperators
  674.  
  675. (if (exists "SQ-Operators")
  676.   (
  677.     (set #ask_sq (askbool (prompt #Msg_SQOperators) (help @askbool-help) ) )
  678.  
  679.     (if (= #ask_sq TRUE)
  680.       (
  681.         (copyfiles
  682.           (prompt #Msg_CopyEnvConfig)
  683.           (help @copyfiles-help)
  684.           (source "SQ-Operators/envarc")
  685.           (dest "ENVARC:")
  686.           (all)
  687.         )
  688.         (copyfiles
  689.           (prompt #Msg_InstallingLibs)
  690.           (help @copyfiles-help)
  691.           (source "SQ-Operators/libs/svoperators")
  692.           (dest (tackon #svlibdir "svoperators"))
  693.           (pattern "#?")
  694.           (confirm)
  695.           (files)
  696.         )
  697.       )
  698.     )
  699.   )
  700. )
  701.  
  702. ; **************************************************************************
  703. ; EOF ;-)
  704.  
  705. (exit #Msg_Ready)
  706.